﻿using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Collections;
using Tibet.Entidades;
using Tibet.Logica.FabricaLogica;
using Tibet.Logica.Interfaces.MotorRegla;

namespace Tibet.Logica.Comandos.ComandoMotorRegla
{
    public class ConsultarNombreClaseMinusSiUnder : ConsultarNombreClase, IConsultarNombreClase
    {
        public override void Ejecutar()
        {
            {
                //Variables iniciales
                int AnchoLinea; //Guardara el tamaño de cada linea del archivo.
                int i = 0;      //Contador de iteraciones para los ciclos (for).
                int LineaActual = 0; //Linea actual que se esta leyendo.
                Resultado Resp = new Resultado(); //Objeto resultado que sera retornado.

                //Inicializamos Resp asumiendo que el archivo cumple con la regla.
                Resp.Fecha = new DateTime();
                Resp.Fecha = DateTime.Now;
                Resp.Respuesta = true;
                Resp.Mensaje = "No se encontraron errores";
                Resp.Linea = 0;

                try
                {
                    List<EntidadString> listaStr = new List<EntidadString>();

                    for (int j = 0; j < ListaEntidad.Count; j++)
                    {
                        listaStr.Add((EntidadString)ListaEntidad.ElementAt(j));
                    }


                    foreach (EntidadString linea in listaStr)   //Recorro la lista linea por linea
                    {
                        LineaActual++;                //Aumenta el contador de la linea.
                        if (linea.Linea.Length != 0)        //Si la linea no esta vacia.
                        {
                            AnchoLinea = linea.Linea.Length;//Guardamos la cantidad de espacios de la linea.
                            i = 0;                    //Reiniciamos el contador.
                            while (i < AnchoLinea)    //Recorremos la linea caracter por caracter.
                            {
                                if (linea.Linea[i] == 'c') // Si encontramos un abrir de clase.
                                {
                                    if (linea.Linea[i + 1] == 'l')
                                    {
                                        if (linea.Linea[i + 2] == 'a')
                                        {
                                            if (linea.Linea[i + 3] == 's')
                                            {
                                                if (linea.Linea[i + 4] == 's')
                                                {
                                                    if (linea.Linea[i + 5] == ' ')
                                                    {
                                                        int j = 6;
                                                        int cont;
                                                        string original = linea.Linea[j].ToString();
                                                        string aComparar = original.ToUpper();
                                                        bool x = original.Equals(aComparar);

                                                        if (x == true) //chequea que inicie en Mayuscula
                                                        {
                                                            for (cont = j + 1; cont <= AnchoLinea - 1; cont++)    //revisa toda la linea del nombre de la clase
                                                            {                                               //si ademas de iniciar en mayuscula tiene underscore
                                                                if (linea.Linea[cont] == '_')                     //emite un exito de underscore y error de mayuscula
                                                                {
                                                                    Resp.Linea = LineaActual;
                                                                    Resp.Respuesta = false;
                                                                    Resp.Mensaje = "No existe un buen nombramiento de clase en el archivo en la linea " + LineaActual +
                                                                        ", aunque tiene underscore(_) inicia en mayuscula, ejemplo: class Nombre_p ";
                                                                    Entidad = (Resp as Entidad);
                                                                }
                                                                cont++;
                                                            }

                                                            Resp.Linea = LineaActual;
                                                            Resp.Respuesta = true;                       //error en mayuscula y error por no tener underscore
                                                            Resp.Mensaje = "No existe un buen nombramiento de clase en el archivo en la linea " + LineaActual +
                                                            ", el nombre no tiene underscore (_) e inicia en Mayuscula, ejemplo: class Nombre";
                                                            Entidad = (Resp as Entidad);
                                                        }

                                                        for (cont = j + 1; cont <= AnchoLinea - 1; cont++)            //Revisa si ademas de iniciar en minuscula
                                                        {                                                       //tiene underscores,emite mensaje de exito de underscore
                                                            if (linea.Linea[cont] == '_')                             //y mensaje de exito de muniscula
                                                            {
                                                                Resp.Linea = LineaActual;
                                                                Resp.Respuesta = false;
                                                                Resp.Mensaje = "Si existe un buen nombramiento de clase en el archivo en la linea " + LineaActual +
                                                                    ", el nombre inicia en minusculascula y tiene underscore(_), ejemplo: class nombre_p ";
                                                                Entidad = (Resp as Entidad);
                                                            }
                                                            cont++;
                                                        }
                                                        Resp.Linea = LineaActual;                               //si ademas de iniciar en minuscula, no tiene underscore
                                                        Resp.Respuesta = true;                                  //emite exito de minuscula y error de no underscore
                                                        Resp.Mensaje = "No existe un buen nombramiento de clase en el archivo en la linea " + LineaActual +
                                                        ", aunque el nombre inicia en minuscula no tiene underscore (_),  ejemplo: class nombre";
                                                        Entidad = (Resp as Entidad);
                                                    }
                                                }
                                            }
                                        }
                                    }
                                }
                                i++;
                            }

                        }

                    }
                    Entidad = (Resp as Entidad);//Retornamos respuesta.
                }
                catch (Exception e)
                {
                    Resp.Linea = LineaActual;
                    Resp.Respuesta = false;
                    Resp.Mensaje = "Ocurrio un error inesperado al leer la linea " + LineaActual + ". Error " + e.Message;
                    Entidad = (Resp as Entidad);
                }
            }

        }
    }
}
